/**
 * CPAR TOOLKIT - Compiler and Runtime for CPAR
 * Copyright (C) 2012 CPAR TOOLKIT Project Developers
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
#include <Windows.h>
#include "cpar.h"

struct CPARMutex
{
  CRITICAL_SECTION  cs;
  CPARAllocator     *allocator;
  long              idx;
};

static
void
CPARMutexAllocatorListener(CPARAllocator *allocator, void *data)
{
  CPARMutex *pMutex;

  pMutex = (CPARMutex*)data;
  CPARMutexDestroy(pMutex);
}

long CPARMutexCreate( CPARAllocator *pAllocator, CPARMutex **pMutex)
{
  CPARMutex *p;

  p = (CPARMutex*) CPARAllocatorAlloc(pAllocator,sizeof(CPARMutex));
  if(NULL == p)
    return CPAR_E_NO_MEMORY;

  InitializeCriticalSection(&(p->cs));
  
  p->allocator  = pAllocator;
  p->idx        = CPARAllocatorDestroyListenerAdd(pAllocator,CPARMutexAllocatorListener, p);

  *pMutex = p;
  return CPAR_SUCCESS;
}

void CPARMutexLock( CPARMutex *pMutex )
{
  EnterCriticalSection( &(pMutex->cs) );
}

long CPARMutexTryLock( CPARMutex *pMutex )
{
  return TryEnterCriticalSection(&(pMutex->cs));
}

void CPARMutexDestroy( CPARMutex *pMutex )
{
  CPARAllocatorDestroyListenerRemove(pMutex->allocator, pMutex->idx);
  DeleteCriticalSection(&(pMutex->cs));
}

void CPARMutexUnlock( CPARMutex *pMutex )
{
  LeaveCriticalSection( &(pMutex->cs) );
}
